home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Celestin Apprentice 5
/
Apprentice-Release5.iso
/
Source Code
/
Libraries
/
DCLAP 6d
/
dclap6d
/
SeqPups
/
appsrc
/
drawtree.src
/
drawgraphics.h
< prev
next >
Wrap
C/C++ Source or Header
|
1996-07-05
|
2KB
|
60 lines
#include "phylip.h"
#define maxnodes 1200
#define maxnch 30
#define point '.'
#define minus '-'
#define stripewidth 3000L
#define maxstripedepth 3500
#define fontsize 3800
#define pi 3.141592653
#define epsilon 0.00001
#define ebcdic EBCDIC
#define segments 40
#define xstart 10
#define ystart 35
#define LF 10
#define CR 13
#define escape (ebcdic ? '\'' : '\033')
#define null '\000'
typedef enum { treepen, labelpen} pentype;
typedef enum { lw,hp,tek,ibmpc,mac,houston, decregis,epson, oki,fig,
citoh,toshiba,pcx,pcl,pict,ray,xbm,other} plottertype;
typedef enum { vertical, horizontal} growth;
typedef enum {cladogram,phenogram,curvogram,eurogram,swoopogram} treestyle;
typedef enum { penup,pendown} pensttstype;
typedef Char plotstring[maxnch];
typedef short fonttype[fontsize];
typedef Char *striparray;
typedef striparray striptype[maxstripedepth];
typedef struct node {
struct node *next, *back;
boolean tip;
plotstring nayme;
long naymlength, tipsabove, index;
double xcoord,ycoord,oldlen,length,
r,theta,oldtheta,width,depth,tipdist,lefttheta,righttheta;
} node;
struct LOC_plottext { /* Local variables for plottext: */
double height, compress;
short *font;
short coord;
double heightfont, xfactor, yfactor, xfont, yfont, xplot, yplot, sinslope,
cosslope, xx, yy;
pensttstype penstatus;
} ;
typedef struct colortype {
Char *name;
double red, green, blue;
} colortype;
double lengthtext();